package puzzle.projecteuler.p100;

import java.util.ArrayList;
import java.util.Arrays;
import java.util.LinkedList;
import java.util.List;


public class Problem011 {

	public static void main(String[] args) {

		List<Shape> shapes = getAllShapes2(4);
		int[][] m = getNumbers();
		long r = 100000;
		int x = 0;
		int y = 0;
		Shape s = null;
		for (int i = 0; i < 20; i ++) {
			for (int j = 0; j < 20; j ++) {
				for (Shape shape: shapes) {
					long tmp = getProductAt(m, i, j, shape);
					if (tmp != -1 && tmp > r) {
						r = tmp;
						s = shape;
						x = i;
						y = j;
					}
				}
			}
		}
		System.out.println(r);
		System.out.println(x);
		System.out.println(y);
		System.out.println(s);
	}
	
	private static int[][] getNumbers() {
		return new int[][]{
			new int[]{ 8, 2,22,97,38,15, 0,40, 0,75, 4, 5, 7,78,52,12,50,77,91, 8},
			new int[]{49,49,99,40,17,81,18,57,60,87,17,40,98,43,69,48, 4,56,62, 0},
			new int[]{81,49,31,73,55,79,14,29,93,71,40,67,53,88,30, 3,49,13,36,65},
			new int[]{52,70,95,23, 4,60,11,42,69,24,68,56, 1,32,56,71,37, 2,36,91},
			new int[]{22,31,16,71,51,67,63,89,41,92,36,54,22,40,40,28,66,33,13,80},
			new int[]{24,47,32,60,99, 3,45, 2,44,75,33,53,78,36,84,20,35,17,12,50},
			new int[]{32,98,81,28,64,23,67,10,26,38,40,67,59,54,70,66,18,38,64,70},
			new int[]{67,26,20,68, 2,62,12,20,95,63,94,39,63, 8,40,91,66,49,94,21},
			new int[]{24,55,58, 5,66,73,99,26,97,17,78,78,96,83,14,88,34,89,63,72},
			new int[]{21,36,23, 9,75, 0,76,44,20,45,35,14, 0,61,33,97,34,31,33,95},
			new int[]{78,17,53,28,22,75,31,67,15,94, 3,80, 4,62,16,14, 9,53,56,92},
			new int[]{16,39, 5,42,96,35,31,47,55,58,88,24, 0,17,54,24,36,29,85,57},
			new int[]{86,56, 0,48,35,71,89, 7, 5,44,44,37,44,60,21,58,51,54,17,58},
			new int[]{19,80,81,68, 5,94,47,69,28,73,92,13,86,52,17,77, 4,89,55,40},
			new int[]{04,52, 8,83,97,35,99,16, 7,97,57,32,16,26,26,79,33,27,98,66},
			new int[]{88,36,68,87,57,62,20,72, 3,46,33,67,46,55,12,32,63,93,53,69},
			new int[]{04,42,16,73,38,25,39,11,24,94,72,18, 8,46,29,32,40,62,76,36},
			new int[]{20,69,36,41,72,30,23,88,34,62,99,69,82,67,59,85,74, 4,36,16},
			new int[]{20,73,35,29,78,31,90, 1,74,31,49,71,48,86,81,16,23,57, 5,54},
			new int[]{01,70,54,71,83,51,54,69,16,92,33,48,61,43,52, 1,89,19,67,48}
		};
	}
	
	private static class Point {
		int x;
		int y;
		
		public Point() {
			this.x = 0;
			this.y = 0;
		}
		public Point(int x, int y) {
			this.x = x;
			this.y = y;
		}
		
		@Override
		public boolean equals(Object o) {
			if (o == null) {
				return false;
			} else if (!(o instanceof Point)) {
				return false;
			} else {
				Point p = (Point)o;
				return (this.x == p.x && this.y == p.y);
			}
		}
		
		@Override 
		public String toString() {
			return "("+this.x + "," + this.y + ")";
		}
	}
	
	@SuppressWarnings("serial")
	private static class Shape extends ArrayList<Point> {
	
	}
	
	private static List<Shape> getAllShapes2(int len) {
		
		Shape[] shapes = new Shape[]{
				getShapeAt(new Point(0,0),  0,  1, 4),
				getShapeAt(new Point(0,0),  0, -1, 4),
				getShapeAt(new Point(0,0),  1,  1, 4),
				getShapeAt(new Point(0,0),  1,  0, 4),
				getShapeAt(new Point(0,0),  1, -1, 4),
				getShapeAt(new Point(0,0), -1,  1, 4),
				getShapeAt(new Point(0,0), -1,  0, 4),
				getShapeAt(new Point(0,0), -1, -1, 4)
		};
		return Arrays.asList(shapes);
	}
	
	private static Shape getShapeAt(Point p, int dx, int dy, int len) {
		
		Shape shape = new Shape();
		for (int i = 0; i < len; i ++) {
			shape.add(new Point(p.x + dx*i, p.y + dy*i));
		}
		return shape;
	}
	
	public static List<Shape> getAllShapes(int len) {
		
		LinkedList<Shape> shapes = new LinkedList<Shape>();
		Point p = new Point(0,0);
		Shape shape = new Shape();
		shape.add(p);
		shapes.add(shape);

//		shape = shapes.getFirst();	//jdk 6
		shape = shapes.getFirst();	//jdk 5
		while (shape.size() < len) {
			shapes.addAll(extendShape(shape));
//			shape = shapes.pollFirst();	//jdk 6
			shape = shapes.getFirst();	//jdk 5
		}
		return shapes;
	}
	
	private static List<Shape> extendShape(Shape shape) {
		
		List<Shape> shapes = new ArrayList<Shape>();
		Point last = shape.get(shape.size()-1);
		
		for (int i = -1; i <= 1; i ++) {
			for (int j = -1; j <= 1; j ++) {
				Point np = new Point(last.x+i, last.y+j);
				if (!shape.contains(np)) {
					Shape ns = new Shape();
					ns.addAll(shape);
					ns.add(np);
					shapes.add(ns);
				}
			}
		}
		return shapes;
	}
	
	private static long getProductAt(int[][] m, int x, int y, Shape s) {
	
		long r = 1;
		for (Point p: s) {
			if (p.x+x>-1 && p.x+x<m.length && p.y+y>-1 && p.y+y<m[0].length) {
				r *= m[p.x+x][p.y+y]; 
			} else {
				return -1;
			}
		}
		return r;
	}
}
